home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 1.iso / ARGONET / PD / PROGRAMMING / DESKLIBC / SOURCES.ZIP / DeskLib / !DLSources / Libraries / Font / s / Font08 < prev    next >
Text File  |  1995-08-26  |  530b  |  26 lines

  1. ; Author: Copyright 1993 Shaun Blackmore
  2.  
  3.         GET     ^.h.regdefs
  4.         GET     ^.h.swinos
  5.         GET     ^.h.macros
  6.  
  7. ;os_error *Font_ConverttoOS(int x, int y, int *xout, int *yout)
  8.  
  9.  
  10.  
  11.         PREAMBLE
  12.         STARTCODE Font_ConverttoOS
  13. ;
  14.         STMFD   sp!, {r4,lr}
  15.         MOV     r4,r3
  16.         MOV     r3,r2
  17.         MOV     r2,r1
  18.         MOV     r1,r0
  19.         SWI     SWI_Font_ConverttoOS + XOS_Bit
  20.         STR     r1,[r3,#0]
  21.         STR     r2,[r4,#0]
  22.         MOVVC   r0,#0
  23.         LDMFD   sp!, {r4,pc}^
  24. ;
  25.         END
  26.